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STOMP 
by Rich Bouchard 

Here is SoftSide’s latest assault on typos, to 
make life easier for users who type in their pro- 
grams from printed listings. This new, official 
debugging utility replaces SWAT, and offers 
still more assistance if you type in BASIC 
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Seabase Survival 
by Michael P. McEwen 

Your mission, should you choose to accept 
it, is to save Atlantis Il, a seabase resting on 


the ocean floor, while your technical crew 


develops new technology to compensate for 


the dying geothermal energy source............. 


DV BONUS PROGRAM: Filter 
by Michael J. Sorens 

Drive your printer to generate stylish output 
with this program. Add text interactively while 
printing, and check pertinent document 


statistics, all with one or two keystrokes ........ 


Maze 
by John F. Gabriel Jr. 

Create an almost infinite number of mazes, 
and wend your way through them — from a 


mouse-eye point Of VieW ......... cece eee eee eee 


Adventure Disk and Cassette Bonus 
SoftSide Adventure Series: Jack the Ripper Il 
by Peter Kirsch 

Suppose the evil Ripper never really died. 
This adventure casts you in the role of a 
modern Scotland Yard Inspector on the trail of 


Jack the Ripper number two.............eeeeee 


General Information 


and System Requirements ...........--+++s0005 
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by Kerry Shetline 
translation by Rich Bouchard 


STOMP is a utility to help track down typing errors in programs from Soft- 
Side Selections. It replaces SWAT beginning with Issue 45. 


Note: Please read ail the instructions for STOMP before beginning. 


Why STOMP? 

STOMP (Stop Typos On My Programs) aids the reader who types BASIC 
programs from a listing in SoftSide or SoftSide Selections. It is SoftSide’s new 
official debugging utility. Until now, this function was filled by SWAT, which 
readers hailed as a great aid in tracking down the inevitable errors that occur 
when you are typing several pages of BASIC code. The concise SWAT table 
narrows the search for errors to no more than twelve lines of code. For com- 
plex programs, you can reduce this number at will. 

Nonetheless, SWAT has drawbacks and deficiencies. For one thing, to get a 
matching SWAT table, readers must type every line of the program exactly as 

.it appears in the magazine. Even REM statements, which BASIC ignores, have 
to be replicated precisely. Also, SWAT can’t detect simple transpositions. This 
means that the numbers 32767 and 36277 are identical to SWAT. If these 
numbers are part of a DATA statement for a machine language routine, the 
computer may hang up, or important data may vanish. Furthermore, because 
SWAT is written entirely in BASIC, it is quite slow. In sum, SWAT, although 
a big help, leaves much room for improvement. 

STOMP corrects SWAT’s deficiencies. It is faster, easier to use, and more 
reliable than SWAT. In addition, STOMP ignores REM statements and in- 
significant spaces. If you type BASIC programs from SoftSide Selections, 
STOMP will save you many hours. 

You may omit any REM statements in our programs. If you do so, be sure 

- to remove any colon (:) immediately preceding the word REM. In addition, 
feel free to add REM statements (within the constraints of memory) without 
changing the STOMP tables. 

The tables STOMP generates are identical in appearance to SWAT tables, 
so SWAT veterans will have no trouble interpreting STOMP tables. Type 
STOMP in now, and start using it right away! 


Starting Up With STOMP 


STOMP is an assembly language program. This means that it generates its 
tables rapidly. It also means that you need append nothing to the program you 


are testing. Type the STOMP Generator program listed below. Save it. Check 
it with SWAT to be sure it is correct, then run it. The Generator program does 
its own check to be sure you have entered it correctly. 
If you see the message ‘‘Sorry, but there is an error in the DATA statements 
in lines 1000-1300,’’ then carefully check these lines, correct the error or er- 
rors, save the program and try again. 


Using STOMP 

When you want to use STOMP, run the Generator program. It installs 
STOMP at the top of memory. Next, type and save the program you want to 
check. If you have already saved the program, you may, of course, simply load it. 
STOMP uses the NAME command. To get a STOMP table, you may simply 
type 


NAME 


This command generates the type of STOMP table we usually publish. If you 
want a printout of your table, type : . 


_ NAME P 


When the STOMP table exceeds one screenful, the program pauses until you, 
press Enter. This pause does not occur if you have the table printed. 

For particularly complex programs, we publish expanded STOMP tables 
that can locate typing errors to within two or three lines. Such tables carry a | 
label like, ‘‘Modified parameters: Line count. = 3, Byte count = 200.”’ To 
generate such tables, type 


NAME Ic,bc 


where Ic and bc represent the particular numbers for your table FO get a print- 
out, use the command 


NAME Ic,bc,P 


If your table matches the published one, you may begin using your program. 
If they do not, see the section entitled, ‘“What’s All This About Parameters?’’ 
which further explains parameters. 3 

When you are done using STOMP, you will want to remove it to release the 
memory it occupies. The following commands do this. 


NAME *:CLEAR 50 


Note that some programs in SoftSide Selections use the same area of 
memory as STOMP. If you run such a program, or if there is any doubt, simp- 
ly run the Generator program again. When such a program appears in our 
pages, we will note it in the accompanying article. Do not run such programs 
until the STOMP tables check out, or you must re-run the Generator program. 


eee 
What To Do If The STOMP Tables Don’t Match 
@ First examine the listed line numbers in the first columns of the tables. If 
they don’t match, it probably means that you have inserted, omitted or changed 


STOMP 
SoftSide Selections #45 


SoftSide Selections #45 
STOMP 


at least one line number. A large omission from a line can also throw off the 
first column. An extra or missing line affects all entries in the first column 
from that point on. Search the lines indicated by the first erroneous entry for 
the bad line, and correct it. Then try running STOMP again to see if the entries 
match. 

@ If, after you have verified all the line numbers, there are still discrepancies 
in the second or third column, you need to make a more detailed search. 

(a) If the length for a range of lines is too big, it is likely that you have 
misspelled a BASIC keyword. Another possibility is that you typed too many 
spaces or other characters in a PRINT or DATA statement. Check all variable 
names. 

(b) If the length entry is too small, check for omissions. Did you leave out 
part of a line? Did you miss a character in a PRINT or DATA statement? 

(c) If the length is correct but the STOMP code is wrong, check the ap- 
propriate lines for transposed or mistyped characters. 

Remember that STOMP ignores REM statements and spaces that aren’t 
significant. Anything within quotation marks is vital, and you must type it 
precisely. The same goes for DATA statements, except for spaces between the 
word DATA and the first item, which are not important. 


What’s All This About Parameters? 


Parameters are simple to understand. Normally, STOMP starts a new line in 
its table when it has checked twelve lines or 500 bytes of memory, whichever 
comes first. This means that it will narrow your search for typographical er- 
rors to about a twelve-line range of the program. If a program is particularly 
complex, we make STOMP generate new table entries at smaller intervals, 
making your search for typos still easier. 


Oo go00. 0-99-90 9008 a0: 990-00 
55 &§ 
5 TRS-20 BASIC $§ 
BS “STORP. Generator’ 55 
55 Author: Rich Bouchard 56 
55 copyright © if83 55 
55 SoftSide Publications, Inc §§ 
5 55 
oo. 55-65 35 96-55. 95. $52=59:48. 55 


If you don’t wish to type this program, it is 
available on issue #45 SoftSide DV and CV. 
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) CLEARSE 

CLS:PRINT"SOFTSIDE MAGAZINE PRESENTS... STOMP":PRINT 
PRINT YOU RAVE A *; 

30 PORE-1, 0: [FPEEK (-1) sQTHENZ=204: PRINT "49": EL SEPOKE-1 4385, 0:1 
PEER (-16385) =OTHENY=190: PRINT"S2";ELSEX=124: PRINT" 12": 
14) PRINT" "3 

130 POXEL S561, 255:PQKE16562, %-1sCLEARSO 

160 X=PEER (16562) 41: 4228206: TFA? 32 787 THENA=A-b5536 

179 DRSHOT(PEER (14394) =201) 

180 IFDKTHENPRINT“DISK* SELSEPRINT" TAPE": 

190 PRINT" SYSTEM" :PRINT 
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by Michael P. McEwen 


Seabase Survival is a simulation game for any TRS-80® Model | or Ill 
with 16K RAM. 


As your transport sub descends into the briny ocean depths, you break open 
the seal protecting the documents describing your secret mission. The eerie 
glow from the instrument panel illuminates the papers. Your goal is to save 
Atlantis II, a seabase resting on the ocean floor just off the continental shelf. 
Atlantis II is powered by a nearby ‘‘hot spot’’ beneath the ocean floor. But 
alas, this geothermal region’s temperature is dropping and technicians are 
feverishly developing a new technology based on ocean pressure differentials 
and hydraulics. You have been chosen to manage Atlantis II during this 
critical period. Your primary objective is to get the new technology going 
within ten weeks, before the old geothermal system finally fails. During this 
time, you must keep the small city alive with ample supplies of fresh water and 
algae. 

Your most important resource is the hot sea water spewing from the ocean 
floor. From the colony’s main intake, you can divert variable proportions to 
the three main systems: the electrical generators, the algae farms and 
desalinization plant (yielding fresh water for drinking). The number of 
kilowatt-hours of power generated each week depends on the rate of flow 
(gallons per second or gal/s) and the temperature. The farms, the fresh water 
plant, the hydrodome protecting Atlantis II and the new power plant construc- 
tion all require power. 

Algae feeds the people of Atlantis II and depends on water flow rate and 
power allotment. Plankton is harvested to feed the surrounding whale popula- 
tion and is essentially free, except for the power needed to operate the 
harvesting machines. In return for plankton, the whales keep your water in- 
take free from debris. Thus, keeping the whales happy is an important factor 
in your weekly water flow value. 

The amounts of power and water assigned to desalinization determine the 
amount of fresh water available for drinking. You must monitor the air’s ox- 
ygen content, which changes according to algae production and desalinization. 

A hazard of locating Atlantis II near a geothermal area is frequent tremors 
and landslides. The hydrodome is powered to protect Atlantis II from the in- 
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tense ocean pressure and falling boulders. To help with the latter, a sonic zap- 
per guns down large boulders before they hit the hydrodome during a land- 
slide. Your hydrodome can sustain ten boulder hits before it collapses. 

You are interrupted by a jolt as the submarine comes to a halt at the Atlantis 
II airlock. It is week one and time to begin your work. 

Seabase Survival primarily uses the arrow keys and space bar except to input 
the power distribution. You may use the Alpha Joystick in lieu of the 
keyboard. Move the joystick in the desired arrow direction and press the fire 
button instead of the space bar. Sound is available by connecting an amplifier 
to the cassette AUX port. 


Strategies 


@ During a landslide, horizontally direct the ‘‘+’’ to a falling boulder by ar- 
rows or joystick. Press the space bar or the fire button momentarily to unleash 
an invisible zap. 

@ Your new technology will develop faster in later weeks so don’t be disap- 
pointed that progress seems slow at first. You should assign most of your 
power to the new technology every week. 

@ Don’t produce more than the maximum algae needed — but never produce 
less than half this value. 

® Stay on good terms with the whales to achieve maximum water intake. 

@ The range of acceptable desalinization assignments has a sharp cut-off 
since reserves hold close to the weekly demand of around 30,000 gallons, so 
watch out. 


Variables 


A: Dummy variable used to call 
sound routine. 

B: Number of boulders left in 
-landslide. 


C: Atmosphere oxygen percentage. 


D: Number of boulder hits 
hydrodome can sustain. 

DS: Dome status percentage. 

EA: Maximum tons of algae re- 
quired for current week. 

F: Number of zaps available. 

FP: Zap target crosshair position. 


_G: Geothermal region temperature. 


J,K,L: Temporary integer values. 
LP(*): Last week’s power 
assignments. 

MM(*): Machine language sound 
routine. | 

N: New technology completion 
percentage. 

NP: New change in fresh water 
reserves. 

P: Power generated during current 
week. 

P(*): Power assignments for cur- 
rent week. 


PA: Power assigned to grow algae. 


PP: Power assigned to harvest 
plankton. 

PR: Power not assigned to 
anything. 

R: Whale status. 

S: Temporary input string. 

S1, S2, S3, S4, S5: Graphic pic- 
tures. 

SD: Graphic picture of dome. 
SN(*): System names. 

SP: Prompt for user. 

Note: All variables beginning with 
the letter ‘‘S’’ are string variables. 
T: Current week number. 
W,WT: Temporary water flow 
values. 

WA: Water output temperature. 
WC: Water flow rate for current 
week. 

WH: Desalinization water flow. 
WN: Water intake temperature. 
WR: Quantity of fresh water in 
reserve. 

X,Y: Falling boulder position. 
YA: Tons of algae produced. 
YP: Tons of plankton harvested. 
Z: Keyboard/joystick input value. 
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Create power generation display. 
water flow according to player input. 


Jump to initialization. 
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Begin status report by computing amount of water desalinized 
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Compute and display hydrodome status. 
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by Michael J. Sorens 


Filter is a driver program for the TRS-80® Model | or Model [il com- 
puter with a Centronics™ 737/739 (Line Printer IV), or an Epson MX™ 
series printer, with Graftrax™. it may also work with other printers, but 
some printer-specific commands may not work. 


Filter takes a text file created with any word processor, such as Microtext 1.2 


14 


or 2.0, and ‘‘filters’’ out certain characters to generate stylish output on the — 


printer. Some of the possible features, depending on the printer, are: italics, 
double width, underlining, condensed width, emphasized type, overprinting, 
proportional type, subscripting, superscripting, indentation, forward and 
reverse line feeds, page formatting, header or footer printing with page 
numbering, and multiple line spacing. In addition, you may add text interac- 
tively to the document while it is printing, or display all or part of the unfor- 
matted document on the screen with or without line numbers attached. Perti- 
nent statistics on the document, such as average line length and total document 
size, are easily available. You can modify all the control capabilities, and all 
_ require only one or two keystrokes. 


Filter Flow Chart 

To use Filter, enter a document through the keyboard into a computer file 
using a text editor. Filter processes the special control characters, and pro- 
duces polished output. 


| we ct FILTER 


keyboard >—— ——> printer 


The complete sequence of operations for preparing a document under 
TRSDOS is: 


@ Prepare a text file with a standard editor, inserting control characters and 
format commands as described later. 

@ Store the file on a disk in ASCII (character) format. 

@ From the operating system level (DOS READY) type BASIC. 

@ In response to Memory size? press ENTER, and to Number of files? type 
one, or ENTER. | 
@ Type RUN ‘‘FILTER/BAS’’ to begin using the program. 

@ Set the control features if you want to bypass the defaults (FEATURES 
command). 

@ Load a text file into memory (LOAD command). 

@ Examine the file or file statistics if desired (DISPLAY or STATISTICS 
command). 

@ Print the document (PRINT command). 

@ Repeat any steps above until finished, then conclude the program with the 
END command. 


Using Filter Features 

Format specifications and printing functions are the two types of features 
you will use in tailoring a document. Printing functions require one or two 
embedded characters to activate a printer-unique function such as underlining 
or superscripting. In contrast to these ‘‘hard’’ features, format specifications 
control the ‘‘soft’’ features such as page margins, indentation and blank lines. 


Printing Functions 
To enable or disable some inherent feature of the printer, such as double- 
width printing, type a control character in the text at the desired point. A 
control character is just some character on the keyboard that is designated vo 
by the operator to control a particular function. Each function must 
have a unique control character. Generally, you should use 
characters like ‘‘#’’, ‘°$’’ or ‘‘&’’, that are not needed in the actual QO 
text. If you need a control character as a text character, tem- xg’ 
porarily bypass the special function, as explained below. A set yay 7 
of default control characters is built into Filter. re) 
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\) ’ The first occurrence of the control character enables the 
oO function; the second insertion disables it. For example, if the 
gy character ‘‘/’’ activates the italics mode, place it just before the 
word or phrase to be italicized, and deactivate it by placing the slash at 


S ‘the end. 


/ The slash toggles the italics mode/ on and off. 


Notice how the control character brackets the words. Most control characters 
are-independent of each other and can be intermixed. 


If the italics code is ‘‘/’? and boldface is ‘‘+’’ you could do this: 


You can mix +boldface+ and /italics/ freely within the same sentence — 
even combinations such as +/bold italics +/ are possible. 


Unfortunately, each printer has certain combinations it will refuse to inter- 
pret as you wish. All these restrictions are buried in the appropriate printer 
manual. For example, the Centronics printers won’t change from proportional 
or condensed text back to normal within one line, but only at the beginning of 
a line. However, you can change from proportional to condensed, or vice ver- 
sa, anywhere in a line. The Epson printers can’t handle subscripts and 
superscripts simultaneously; this produces normal characters. Similarly, con- 
densed letters are not possible in the emphasized mode. 


Note to Centronics users: One printing feature requires a two-character 

code: the type set specification (normal, proportional, or condensed type). The 

- Centronics printers can use only one of these printing types at a time so the 
two-character code ensures only one is active. Each type set is identified with a 
number: 1 = normal, 2 = proportional, and 3 = condensed. To select a type 
set, then, requires the type set control character followed by the number of the 
type set. 

A Filter document, before printing, has many control characters contained 
within the text. Once you issue the PRINT command, it filters each line, con- 
verting each control character into a non-printable command for the printer. 
In the process, line lengths will decrease; this is important to remember when 
lining up columns or tables. Also, take care when changing character widths 
and fonts since in some fonts the space character also changes size. Thus, if the 
left margin is fifteen in normal width mode, and you change to condensed, the 
margin shifts to fifteen condensed width spaces. 

Changing the font at the beginning of a line may not do what you expect due 
to the way Filter prints a line. First, it puts sufficient blanks into the current 
character set to get to the appropriate margin. Then it prints the line — and 
any control characters. So, if the printer is in condensed width and the next 
line begins with a return to normal width code, the margin for the line still has 
condensed rather than normal spaces, since the new font isn’t activated until 
after the margin is spaced. Subsequent lines, however, will have normal width 
spaces used for the margin. 

Ten functions are available on the Epson, and seven on the Centronics 
printers. Condensed and proportional type are controlled by the same code on 
the Centronics. Listed below are the printing functions along with the default 
‘control characters for each printer. A given function is used on a particular 
printer only if a character is specified for it here: 


Function Epson Centronics 


Condensed @ $ 
Double Strike + 

Double Width # i# 
Emphasized $ 

Function Escape ) ) 
Italics ! 

Keyboard Input = = 
Proportional $ 
Subscripting % % 
Superscripting . . 
Underlining / 


The Keyboard Input function pauses during printing to ask for input. 
Substitute the input text into the document in place of the control character. 
When a keyboard input character is encountered, the screen displays that line 
of text, with a graphic block on top of this character, indicating where to insert 
the new text. The prompt ‘‘TEXT:’’ appears below the line and the system 
waits for you to enter the new text. Type only the additional text to replace the 
control character. A good use for this is to personalize a form letter. You can 
say, in the middle of the letter, ‘“Thank you, Mr. =, for your patronage.” 
When the printer stops, simply insert the correct name. 

The Function Escape cancels any control character, so you can use itasa 
normal text character. You can use the function escape on itself to print the 
character rather than to escape some other function. 

If you have two keyboard input characters on the same line, the screen 
display shows a different graphic character for each. This removes any am- 
biguity. 


Format Specifications : 
Filter formats documents with margins, indents, paginations, and so on. 
Each format specification must be on a line by itself using the following syntax: 


fcc fcode (=) value 


Fcc is the format control character, fcode is the two-letter format opcode and 
value is an operand for the format function (although not all format functions 
require operands). The equals sign is optional; a space character works too. 
Sometimes using a space is more natural than an equals sign. The fcc used in 
this discussion is a period. Scripsit™ users may prefer the greater than symbol 
‘*>” since some Scripsit commands are valid Filter commands and vice versa 
(provided the equals sign is used). The Filter command ‘‘.IN +10’’ or 
‘‘ IN= +10” indents ten spaces. . 

Each format function becomes active at the point in the text where it ap- 
pears. Thus, if 50 lines have been printed and an embedded command 
changes the page length to 45, it immediately jumps to the next page, a) 
and prints only 45 lines. Finally, note that right justification is not = 
provided; each line is simply truncated at the closest word bound- 
ary inside the current right margin. | 
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Description of Format Codes 

@ BP — Bottom of Page — the printer immediately goes to 

the bottom of the page, prints a footer, advances to the next 

~\ page, prints a header, then continues printing. 

\) @ ET — End of Text marker — this must be the last line of each file. 
y @ FT title — Footing Title requires the string title; if not specified then no 

set. . 

@ HT title — Heading Title requires the string title; if not specified then no 

heading is printed. The heading is printed in the standard (default) character 

set. If this format line is the first line in a file, the header is printed on the first 

page of output; if entered elsewhere, it is printed on the following page. — 

@ 1G char — This causes the program to IGnore the control character char on 

the next line only. : : > ioe 

@ IN (sign) value — INdents text by adjusting the left margin. If the sign, + 

or — is present, the left margin moves relative to the current value. Not using 

the equal sign sets the left margin to the given value, which is equivalent to the 

.LM format line. : 7 

@ LL (sign) value — Sets Line Length to value and changes the right margin 

accordingly. If the sign, + or — is present, the line length changes by the given 

value. Default = 80, Max = 132. : : | = 

@ LM value — Sets the Left Margin of the page to value. Default = 16, Max 

= 32. 

@ LS value — Sets the Line Spacing to value. Single spaced is one, two is dou- 

ble spaced, etc. Default = 1, Max = 60. 

@ PA — Causes a PAuse. The program waits until you press <ENTER >. 

@ PL value — Sets the Page Length (number of lines per page) to value. 

Default = 56, Max = 60. — 3 

e@ PN value — sets the current Page Number to value. To set a page number 

other than one for the header on the first page, this line must follow im- 

mediately the .HT statement in the file. Default = one. 

@ PR char — Start or stop PRinting sections of a document. If char is N (no) 

then printing ceases until a .PR Y command. Default = Y (yes). 

@ RM value — Sets the Right Margin of the page to value. Default = 96, Max 

= =132Z. 

@ SP (sign) value — Prints value blank lines (SPaces). If the sign is ‘*— es 

value, it prints reverse line feeds (Centronics only), which overprint the line. 

The Epson printers use double strike mode to overprint. If the value is too 

large (i.e. the printer would leave the current page), the number is truncated to 

advance just to the top (or bottom) of the current page, depending on the sign. 


footing is printed. The footing is printed in the standard (default) character 
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@ TI (sign) value — Temporary Indent — performs the same as .IN but only | 


for the line immediately following. 
@ ** string — This is a comment which is neither printed nor examined by the 
program; string may be anything but it must fit on one line. — 


Page Numbering | 

A page number may appear in either a header or a footer string. Use the 
pound symbol ‘‘#’’ to mark the location where the page number should be in- 
serted. The page number that begins at that column is printed to the right, 


ier ee 


a 


followed by the remainder of the header or footer. Hence, the page number is 
left-justified. Several pound symbols may be used, each adjacent to the 
previous one, to define a field for the page number. As long as there are more 
pound symbols than digits in the number, the page number will be right 
justified, with leading pound symbols printed as blanks. No control characters 
other than the pound symbol will be recognized in a header or footer. 


Examples: 
Header String Page Number Printer Output 
The page is # now. 1 The page is 1 now. 
The page is ### now. 1 The page is 1 now. 
The page is # now. 666 The page is 666 now. 
The page is ### now. 666 The page is 666 now. 
The page is ###### now. 666 The page is 666 now. 


Page Boundaries 

A physical page consists of 66 lines subdivided into four zones: header, text, 
footer and between-page. The header and footer zones each occupy three lines. 
The header zone consists of a header string, which is printed on exactly one 
line, followed by two blank lines. The footer zone consists of two blank lines 
followed by the single-line footer string. If either the header or footer has not 
been specified, this will just be another blank line. The text zone occupies the 
number of lines set by a Page Length format line (.PL). The between-page 
zone comes last, occupying however many lines are left to account for all 66 
lines. The maximum text zone size is 60 lines. At this limit the footer of one 
page will be followed immediately by the header of the next, with zero lines for 
the between-page zone. 
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: AS Alternate Function Escape 

on The format control character ‘‘.’’ is considered a regular text 

QD character automatically if it is not the first character in a line, so 
in most cases it is not necessary to use the function escape on it. 

However, if you wish to use the format control character as a regular 


~\ 


method available for deactivating the special functions of control characters 
— the .IG format line. This causes the printing scanner to ignore every occur- 
rence of the specified control character in the line which immediately follows 


: N character at the beginning of a line, use the function escape. An alternate 
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the format line. Only one .IG line can apply to any given line of text at one © 


time, though. 


Commands 

The menu displays six command choices. When entering a command, you 
may type just the first character, or any number of characters of the command 
word. Hence, you could type the LOAD command as L, LO, LOA or LOAD. 
Similarly, any arguments to a command may be abbreviated. Thus, to display 
a file with line numbers beginning at line 25, you could type DISPLAY NUM 
25 or just D N 25 (see the DISPLA Y! command). Type all commands in up- 
percase letters. 

The description of each command is preceded by the syntax of the command 
line for that particular command, following this pattern: 


keyword (option) (option) 


In this syntactical description, words in uppercase indicate words that 
should be typed while words in lower-case italic indicates that an appropriate 
item should be substituted. The keyword will always be in uppercase letters, 
signifying that the word should be typed. The parentheses indicate the word is 
an option; it may or may not be typed at the operator’s discretion. 


Example: PRINT (PAUSE) (line) 


indicates that the word ‘‘PRINT”’ should be typed, optionally followed by the 
word ‘‘PAUSE’’, optionally followed by a line such as ‘‘1’’ or ‘‘25’’, or any 
valid line number. The parentheses serve only to indicate that a word is op- 
tional. The parentheses themselves should not be typed. 


LOAD (filename) 


This command loads a disk file into memory, showing a count of lines as the 
file is read. The filename need not be entered with the command; if it is not 
present, you will be prompted for it. While the file is loading, the text is ex- 
amined for some of the items shown under the STATISTICS command, e.g. 
longest and shortest line lengths, average line length, and document length. 


Special Keys: The ‘‘CLEAR’’ will return to the menu anytime during the 
load operation, retaining the partial file in memory. 


Examples: LOAD | 
LOAD FILE1 


DISPLAY (NUM) (line) 

Use this to display a file on the screen. If NUM is specified, a fine number 
will be attached to each line. If a line number is specified, the file will be 
displayed beginning with that line. If a number is not supplied, the file will be 
listed from the beginning of the document. Either or both options may be used, 
but if both are used they must appear in the order shown. 


Special Keys: The ‘‘CLEAR’”’ key will stop the listing. The spacebar will 


pause the listing. Hitting the spacebar again will resume the listing. 
Examples: 


DISPLAY 
DISPLAY NUM 1 
DISPLAY 53 
DISPLAY NUM 


FEATURES 


Asks you to select a set of control characters. A different character must be 
selected for each feature that you wish to use. If the features are to be changed, 
they should be modified before loading a file. This is not critical, though it will 
allow the program to recognize format lines accurately, and not include them 
in the program statistics available from the STA 7I7STICS command. The first 
item is the format control character, used to initiate a format line. The default 
is a period. Next is the parameter selection method, with two choices provided: 
1) specified in file and 2) enter from keyboard. 


Specified in File 

This parameter refers to the use of the printing function characters for 
underlining, subscripting, etc. All but the simplest documents use this method. 
Each function is listed on the screen. Enter the character to be used for the 
operation, or press <ENTER> to ignore the operation. After entering all 
items, the screen might appear as shown below (underlined symbols have been 
typed by the operator). This is the Centronics version; the Epson version dif- 
fers only in the list of features. The defaults for both printers are listed above. 


ENTER FORMAT CHARACTER: . PARAMETER SELECTION: 
@ 1) Specified in file 
2) Enter from keyboard 


ENTER CONTROL CHARACTERS FOR: 
Typeface $. Double Width 
Underline aks Subscript : 
Superscript S Poe Keyboard Input : 
Function Escape:  ) 


>>>><ENTER> TO CONTINUE <<<< 
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AAT TL INTO 

Enter From Keyboard 

To produce a document that is entirely in one style — italics 
and double width, for instance — you need not insert the control 
" characters in the text itself. You can do this within the FEATURES 
Q) command. In fact, the text is not examined for any function control 

characters, though it is examined for format lines. As in the previous sec- 

@ tion, each feature for the appropriate printer will be listed on the screen. 
| However, instead of entering a control character, you type ““y’’ (yes) or ‘‘N”’ 
(no) to signify whether the function should be activated or not. Anything other 
than a ‘““Y”’ is interpreted as ‘‘N’’. Here is an example for the Centronics ver- 
sion: 


ENTER FORMAT CHARACTER: . PARAMETER SELECTION: 
1) Specified in file 
M@ 2) Enter from keyboard 


TYPEFACE: 1) Normal (10 CPI) 
2) Proportional — 
mi 3) Condensed (16 CRI) 


Double Width ON Underline 
Subscript pe i Superscript 


>>>><ENTER> TO CONTINUE <<<< 


The Epson version, again, differs only in the selection of features. Note that 
here, in contrast with the‘‘Specified in file’’section, the Keyboard Input and 
Function Escape do not appear. It is meaningless to answer ‘‘yes’’ or ‘‘no’’ to 
these two functions. | 7 

Special Keys: The <ENTER> key will skip to the next entry. The 

<CLEAR > key restarts the FEATURES command. 


STATISTICS 


For the file currently in memory, these statistics are shown: file name, 
number of lines in the file, longest and shortest line lengths, average line 
length, and number of characters in the document. Additionally, all 
parameters selected with the FEATURES commands, or the defaults, will be 
displayed. The total number of lines does not include format lines, empty 
lines, or lines which only specify a type set (Centronics version). Similarly, the 
same types of lines are not included in shortest, longest or average line length 
determinations. 

The screen will show the chosen control characters if the FEATURES op- 
tion ‘‘Specified in file’’ was selected (Epson example): 

File: SAMPLE 
He fe afe af fe ake afc fe afe afc afe akc 
Longest line: 86 Shortest line: 12 Average: 57.2 
TOTALS: 212 lines 12126 chars 
Format line initiator - . 


. Italics uf Double Width > # 
Condensed Width : @ Emphasized : $ 
Double Strike — Underline a7 
Subscript : % Superscript as 
Keyboard input [= Function escape =| 


If ‘‘Enter from keyboard’’ was selected in FEATURES, however, then the 
*‘yes’’ or ‘‘no’’ status of each printing function will be indicated: 


File: SAMPLE 


aie fe fs afc afc afc afc afe ofc she afc af 
Longest line: 86 Shortest line: 12 Average: 57.2 
TOTALS: 212 lines 12126 chars 


Format line initiator - . 


Italics : YES. Double Width : NO 
Condensed Width : YES Emphasized : NO 
Double Strike : NO Underline : NO 
Subscript : NO Superscript : NO 


PRINT (PAUSE) (line) 


When outputting a document in memory to the printer, this command 
checks if the printer is ready (Centronics version). If not ready, you will be 
asked to prepare it (turn the switch on or place it on line). The file is then pro- 
cessed and printed. Any keyboard input characters encountered will stop print- 
ing temporarily while awaiting the supplemental text to be typed by the 
operator. 

Any errors in conttol characters or format commands will be indicated on 
the screen. Once an error is encountered in a given line, the remainder of that 

_ line usually will not be processed further, but will be printed as is. Thus, con- 
trol characters beyond the error will print and will not be activated. This could 
result in very messy output. Finally, the total number of errors will be 
displayed after the document has been printed. 

The ‘‘PAUSE”’ option causes printing to stop at the beginning of each page, 
allowing the use of standard typing paper, or other non-continuous forms. 
Printing resumes when you press the < ENTER> key. You also can effect a 
PAUSE anytime during printing by pressing the spacebar. To resume printing, 
press the spacebar once more. 

If a line number is provided with the PRINT command, printing will com- 
mence at that line. Otherwise, printing will begin with the first line of the docu- 
ment. Either or both options may be used, but if both are used they must ap- 
pear in the order shown. 

Special Keys: The “‘CLEAR”’ key terminates printing. The spacebar pauses or 
resumes printing. 


END (DOS) 

This command ends the program. If the ‘‘DOS’’ option is used, the system 
reverts to the operating system level (DOS READY). Without the ‘‘DOS’’ op; 
tion, the system reverts to BASIC. S : 


i> 
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MAZE 


by John F. Gabriel Jr. 


Maze is a three-dimensional maze game for a TRS-80°® Model | or Ii 
with 32K RAM (modifications are included for 16K systems). 


With Maze, you can create an almost infinite number of different random 
mazes, and then attempt to solve them — from a mouse’s point of view. As the 
game begins, a three-dimensional diagram of what you can see appears on the 
screen. The left and right arrow keys change the direction you face 90 degrees 
left or right, and the down arrow turns you 180 degrees, or reverses your direc- 
tion. The up arrow moves you forward, and the space bar returns you to the 
main menu. | 

Before you enter the maze, a menu presents you with a number of different 
options. Option zero reenters the maze, while option one restarts you at the 
beginning of the maze. Neither of these menu options are available until you 
load or create a maze. 

Option two generates a new maze. First, the program prompts you for the 
width of the maze. Enter a number between five and thirty. If you hit ENTER 
without answering this question, you return to the main menu. You are then 
asked for the length of the maze. Enter a number between five and fifteen, or 
just hit ENTER to change the width of the maze. The computer creates the 
maze, and returns you to the main menu. 

Option three displays the entire maze on the screen, along with your posi- 
tion. You may then press ENTER to return to the menu, or press CLEAR to 
watch the computer solve the maze. Option four is similar to option three, but 
prints the maze onto your printer. If you plan to use this option and are print- 
ing very wide mazes, you may wish to put your printer into condensed print 
mode (if possible) before running the Maze program. 
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Option five saves the maze to disk or tape, while option six retrieves a maze 
from media. As with option two, you may hit ENTER in response to a query 
to backup to the previous prompt, or to return to the menu. 

Option seven prints a page of brief instructions. Option eight is perhaps the 
most amazing option — it presents a 3D view of the start of the maze, and then 
solves the maze while presenting a 3D display of each room. The last option, 
number nine, ends the program. 

When you first run the program, only options two, six, seven and nine are 
available, since no maze is in memory. As soon as you load a maze from disk 
or tape, or generate a new maze, all of the menu options will be available. 


Technical Notes 

A two-dimensional array represents the maze internally. Each member of 
this array is called a room, and is represented by a number. Each number cor- 
responds to a shape which represents the arrangement of walls in that room 
(see chart A). Note that each room has one to four walls. Four walls in a room 
represent an empty or unused room. You cannot move into an empty room 
during the simulation. 

The maze is created in two phases. In the first phase, the maze solution is 
created and stored. In the second phase, the deadends, which shoot off from 
the solution path, are created. Each of these phases uses the tables to construct 
the paths that traverse the maze from room to room. 

When viewing rooms three-dimensionally, each room within view as you 
look down the hallway is assigned a number according to Chart B. These 
numbers represent the position of walls in that room from your viewpoint. If a 
wall crosses a room, then you cannot see any rooms further down the hallway. 

Since a maze and its solution are represented by large arrays, it would take a 
very long time to store and retrieve mazes. Therefore, the technique of string 
packing (and unpacking) is used. Instead of saving as many as 950 array 
values, the values are converted to strings which are concatenated to form 
larger strings. When a string reaches a predefined length (200 characters), a 
new string is started. When the program is done, you have as many as five strings 
which represent all the values of the arrays. We store these strings along with a 
few other variables. Similarly, when a maze is retrieved, the five strings are 
loaded. Then, the strings are unpacked and the values are assigned to the ar- 
rays. 


Note: As listed below, Maze runs only on TRS-80s with at least 32K of 
RAM. The following modifications will make it work on a 16K tape-based 
system, at the expense of the instruction and disk I/O routines. 


110 CLEAR 1600 

540 IF Q< >0 THEN PRINT ‘‘)’’ 

560 PRINT ‘‘)’’ 

1220 GOSUB 3000 

DELETE 1230-1270 

1310 CLS:GOSUB 3000 

DELETE 1320-1370 

1460 CLS:PRINT ‘‘No instructions available.’’:GOTO 510 
DELETE 1470-3050 
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MAZE 


Variables 


A,B,L,U,V,Z: Temporary values. 
A(*,*): Maze layout. 

A$,A1$: Input variables. 

A$(*): Packed strings for save and 
load. 

Al: ASCII value of A1$. 

B(*,*): Break Main Path table. 
C: Number of columns in maze. 
Cl: Temporary storage of C. 
C(*): Column store. 

D: Facing direction. 1 = Right, 
2=Up, 3=Left, 4= Down (direc- 
tions when looking at two- 
dimensional map display). 
D(*,*): Main Path Direction table. 
E: Temporary direction and flag. 
E(*,*): Table for returning room 
type for proper direction. 

F: First room. 

G: Second room. 
G$,G1$,G2$,G3$,G4$,G5$,G6 $, 
G7$,G8$,G9$: Various graphic 
pictures used to create the 3D 
maze displays. 


Numbers Assigned 
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Chart A 


(Right) 


(Left) 
(Bottom) 


Wt : 
TT 
nin 


H,1,J,K: Third, fourth, fifth and 
sixth room. 

LE: Length of input string. 

M: Temporary column position. 
ML: Maximum length allowed for 
input string. 

N: Temporary row position. 

P: Last item index of arrays C(*) 
and R(*). 

Q: Entrance column. 

QU$: Equals CHR$(34), a quota- 
tion mark. 

R: Number of rows. 

R1: Temporary storage of R. 
R(*): Row storage. 

R$(*): Graphic pictures of each 
room, as shown in table A. 

S: Last item index of array S(*). 
S(*): Solution directions storage. 
T: Used to PEEK keyboard 
memory. 

W: Temporary storage of last 
direction. 

X,Y: Player’s column and row 
position. 


Chart B 


(Nothing) 


Tei (Dead-End) 
I— (Waal leading right)| 
(Wall leading left) 
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ss 55 
$5 TRS-80 BASIC Ss 
§5 ‘Maze’ §$ 


§§ Author: John F. Gabriel Jr. 9S 
ag Copyright © 1983 §§ 
S§ SoftSide Publications, Inc SS 
§5 §§ 
§S §5 S§ S5 SS SS SS SS SS SS SS SS 


if you don’t wish to type this program, it is 
avaliable on issue #45 SoftSide DV and CV. 


Initialization. 

100 RANDOM: CLS:PRINTTAB(14) s "MAZE"sPRINTTAB (5): "BY JOHN F. GABRI 
EL JR." 

110 CLEAR2000 

120 DEFINTA-2Z: GOSUBS000 


130 6070510 
Subroutine to input a maximum of 
(ML) characters into variable A$. 


140 LE=0:A$=""sPRINTCHRS (143) 5 sALS=INKEYS 

150 ALS=INKEY$: IFA1$=""THENI50 

160 AL=ASC(A1$) : IFALS9GANDAI< 1 23THENAI=A1-32 

170 TFAL>=S2ANDLE< OMLTHENPRINTCHRS (24) sCHRS(A1) sCHR$ (143): :LE=LE 
+1: AS=AS+CHRS (AL) :GOTO150 

180 IFAL=1STHENPRINTCHRS (8) :sA=VAL (A$) :RETURNELSEIFA1=BANDLE< 0T 
HENPRINTCHRS$ (8) s CHRS (8) sCHRS (143); :LESLE-1:AS=LEFTS (A$, LE) : 60701 
0 

190 TFAI=24ANDLE< SOTHENPRINTSTRINGS (LE+1 8) sGOTOL40ELSEIFAI=1TH 
ENPRINTSPRINT"Break in";PEEK (16546) +PEEK (16547) 8256: END 


200 G0TO150 
Subroutine to erase previous input 
and get new input from user. 


210 PRINTSTRINGS(LE, 8); :G0T0140 


Subroutine to input a single 
character from user. 


220 ML=1:60T0140 
Get maze dimensions. 7 
230 CLS:PRINT"Width of maze (3 - 30) "3sML=2:60SUBI40 


240 IFLE=OTHENSOOELSECI=A: IFC1<SORC 1 SSOTHENGOSUB210: 6070240 

250 PRINT:PRINTSPRINT"Length of maze (5 - 15) °::G05UB140 

260 IFLE=OTHEN230ELSER1=As IFRICSORR1 > 1 STHENGOSUB210:G0T0260 

270 CaCisR=RisPRINTsPRINT 

Create main path (solution). 

280 PRINT"Thinking...°:FORB=1T0R:FORA=1TOCA(A, B)=O:NEXTASNEXTB: 
=0:G=RND(C):A(8,R)=6:A(8, Rei) =6:9(0)=2:5(1)=2:S=1:N=0:N=R-1:4=2 

:B=1:D=RND (3) : 6070300 

270 D=RND (4) 

300 7=0:G0SUB14660: IFZ=4THENZBOELSEA (MN, N)=D(D,W)2S=5+1:9(S)=D:605 

B1760: GOSUB1640:W=D 
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310 IFZ()STHEN290ELSEA=0:B=0:CLS:PRINT"Getting there... "sPRINT@1 


28, "Estiaated wait tiee left:*:USC8(R-1) 
Create dead ends shooting off main — 


path. 

390 AcAti: IFAYPTHENS7OELSEPRINT@154, U-As :N=C (A) :N=R(A)s D=RND (4): 
1=0: GOSUB1660: IFZ>3THENS20 

330 AIM, NJ=B(D,ACH,ND): GOSUB1640:L=RND (8) 3 =D 

340 L=L-{i: » IFL(1 THENSSOELSED=RND (4) 1=0: GOSUBI 46603 IFZ>STHENSSOELS 
EA(M,N)=D(D,¥) :GOSUBI760: G0SUB1 4640: W=D: GOTO340 

350 IFW=1THENA(M,N)=12ELSEIFW=2THENA(H, N)=L1ELSEIFW=3THENA(R,N)= 
{4ELSEA(MN)=13 

360 6070320 

Put player at entrance. | 

370 Y=R+ti 

Check if user’s position is at en- 


trance or exit. 
380 IFYRTHENF=5: G=0: GOSUB1 990: BOSUB2050: X29: Y=R+1:D=2: GOTDAOOEL 


SETFY=QTHENCLS:PRINT Congratulations, you aade it out!":G0T0510 


390 GOSUBIESO 

Get keyboard input (arrow key or 

space bar). 

A0Q T=PEEK (14400): IFT= L2OTHENSOOELSE IFT=64 THENE=1ELSEIFT=32THENE 


=ELSEIFT=16THENE=4EL SEIFT=8THENE=2ELSE400 
Perform specified movement. 

410 GOSUB1520: GOSUB1 610: GOTO380 

Display menu and get user selec- 


tion. 

500 CLS: PRINT 

510 PRINT:PRINT"You aay do any of the following: ":PRINT: IFQ< OTH 
ENPRINT"O - ENTER maze":PRINT"! - RESTART Hee to the entrance of 
the aaze)" 

520 PRINT’2 - GENERATE a new maze" 

530 IFQCOTHENPRINT®S - REVEAL the aaze (2-disensi onal ly) “:PRINT 
"4 - PRINT maze on printer":PRINT'S - SAVE the aaze (to tape’; 
540 IFQ<)OTHENPRINT" or disk)" 

550 PRINT"S - LOAD a maze (from tape"; 

540 PRINT® or disk)"sPRINT'7 - Print Instructions” 

570 IFQCDOTHENPRINT'S - Show SOLUTION in 3-D° 

580 PRINT"? - EXIT prograa® 

590 PRINT:PRINT’Your choice ?°;:G0SUB220 

400 IFADGOR (ASOANDLE( OANDAS< >"0") OR( (0=0) AND (AC >2ANDAC >GANDAC >? 
ANDA<>9) ) THENGOSUB210: G0T0600 

410 ONAFLGOTOS9O, 370, 230, 1000, 1080, 1150, 1310, 1460, 1780, 1490 


Reveal maze in 2D. 
1000 CLS:FORB=1T0R: FORA=1T0C 


1010 PRINTRS(A(A,B)): 

1020 NEXTAsPRINT:NEXTB 

1030 IFXDOANDX<= CANDY OAND (Y¢=R#1ANDY()16) THENASK84-3: B=¥93-2ELS 
EA=-i 

1040 PRINT2960, "Press <CLEAR> for solution or <ENTER> to continu 
e"s 
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1050 IFAC>-1THENSET (A,B): SET (Ati, B) 
1060 T=PEEK (14400): IFAC>-1THENRESET (A,B) sRESET(A+1, B) 
1070 IFT=1THENSOOELSEIFT=2THENGOSUB1920: GOTOL030ELSE1050 
Print maze on printer. 
1080 CLS:PRINT:PRINT"Do you want to print the aaze? (Y/N) "; 
1090 ML=3: GOSUB140: IFLEFTS$(A$,1)<>"Y"THENSO0 
1100 FORB=1TOR:FORZ=0T02 
1110 LPRINTLEFT$(P$(A(1,8),2),1)3sFORA=1T0C 
1120 LPRINTPS{A(A,B),Z)3:NEXTA 
1130 LPRINTRIGHTS(PS(A(C,B),Z), f)sNEXTZ,8 
1140 CLS:PRINT"Printing complete. *:60T0510 
Save maze to disk or tape. : 
1150 CLS:PRINT*Preparing data...":PRINT 
4160 FORZ=1705:A$(Z)=""sNEXTZ:L=0s 2=1 
1170 FORB=1TOR: FORA=1 TOC: L=L+1s IFL>200THENL=1: Z=7+1 
1180 AS(Z)=A$(Z) +CHRS(64+A(A,B)):NEXTA,B 
1190 L=0:Z=Z+1 
1200 FORA=0TOS:L=L+1s IFL>200THENL=1:7Z=2+1 
1210 AS(Z)=A${(Z) +CHRS (6445 (A)) SNEXTASCLS 
1220 CLS:PRINT"SAVE: "3:G0SUB2970: IFA$=""THENSOO 
1230 IFA$="C"THENI280 
1240 OPEN"O",1,A$ 
1250 PRINTHL O57 ses ER yg Zp phe EVE 5 355753 
1260 FORA=1TOZ: PRINT#,A${(A) sA$(A)="":NEXTA 
1270 CLOSE1:60T01300 
1280 PRINT#-1,8,0,R,2,%,Y,5,D 
1290 FORA=1T0Z:PRINT#-1, AS (A): AS(A)="":NEXTA 
1300 CLS:PRINT"Save completed. *:GOTO510 
Load a maze from disk or tape. 
1310 CLS:PRINT"LOAD: "::G0SUB2970: IFA$=""THEN5S00 
1320 IFA$="C"THENI380 
1330 QNERRORGOTO1340: OPEN" I", 1, A$: ONERRORGOTO0: GOTO! 340 
1340 RESUNE1350 
1350 CLS:PRINT"Maze";As"was not found (or other disk error)":G0T 
0510 
1360 INPUT#I,8,C,R,2,X%,¥,8,D 
1370 FORA=1TO2Z: INPUT#1,A$(A) :NEXTA:CLOSE1:G0T01400 
1380 INPUT#-1,0,C,R,7,%,¥,5,0 
1390 FORA=1T02: INPUT#-1,A$(A) sNEXTA 
1400 L=0372=1:FORB=1TOR:FORA=1T0C:L=L+1: IFL>200THENL=1:Z=Z+1 
1410 ACA, B)=ASC(MIDS$(A$(Z),L,1))-b4:NEXTASNEXTB 
1420 L=0:Z=2+1:FORA=OT0S:L=L+i: IFL>210THENL=1: Z=Z+1 
1430 S(A)=ASC(MIDS(AS(Z),L,1))-64:NEXTA 
1440 FORA=1TOZ:AS(A}="":NEXTA 
1450 CLS:PRINT"Load completed. ":60T0510 


Print instructions. 
1460 CLS:PRINTTAB(24):"MAZE":PRINT:PRINT" Maze is an "sQUS;: "an 


azing";QU$;" 3-D siaulation in which your":PRINT"task is to get 
from one end of a maze to the other." 
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1470 PRINT:PRINT” You maneuver through the aaze using the arro 
w keys. "sPRINT’The left and right arrows change your facing, and 
the down":PRINT*arrow does an about face. The up arrow goves y 
ou forward." 

1480 PRINT:PRINT" To get back to the command list,":PRINT"pres 
s the space bar instead of an arrow key.":PRINT:PRINT" Press ¢ 
ENTER) to continue *;:ML=0:G0SUB140: 6070500 

Exit routine. Before exiting, double 

check that user wants to quit. 

1490 CLS:PRINT"Are you sure you wish to exit? (Y/N) °3 

1500 ML=3:G0SUB140: IFLEFT$(A$, 1)<>"Y° THENSOO 

1510 PRINT: PRINTSEND 

Turn or move according to user 

- command. Return with E=1 to move 

in specified direction, or E= =0 to re- 

main in place. 

1520 ONEGOTO1530, 1550, 1570, 1590 

1530 E=0:D=D-1: IFD=OTHEND=4 

1540 RETURN 

1550 IFF(STHENE=0ELSEE=1 

13460 RETURN 

1570 E=0:D=D+i: IFD=STHEND=1 

1580. RETURN 

1590 E=0:D=D+2: IFD4THEND=D-4 

1600 RETURN 


If E< >0, move forward one room. 
1610 IFESOTHENRETURN 


1420 IFD=1THENY=X+1ELSEIFD=2THENY=Y- ~{ELSEIFD=3THENX=X-LELSEY=Y+1 
1430 RETURN 
Change temporary position in maze 


according to direction. 
1440 IFD=iTHENM=N+1ELSEIFD=2THENN=N- -{ELSEIFD=3THENN=M~LELSEN=N+! 


1450 RETURN 
if room is empty, then return. Other- 


wise, change direction and try 
another room. If more than three 
rooms are tried, return. 

1660 V=V+i: IFV)2THENV=1 


1670 ONDGDTO1680, 1490, 1710, 1720 

1680 EFN#1)CTHEN! 73OELSEIFA(H#, N) (OTHEN1 730EL SERETURN 
1690 IFN-1<JANDB=1THENZ=5: RETURN 

1700 IFN-1¢1THEN{730ELSEIFA(M, N-1)< )OTHEN! 730ELSERETURN 
4710 IFN-1¢1THENI730ELSEIFA(M-1,N)<OTHENI7S0ELSERETURN 
1720 IFN+1 RTHENI730ELSEIFA(M, N+1) <)OTHENI73OELSERETURN 
1730 2=2+1: ]FV=1THEND=D+1ELSED=D-1 

1740 IFZY3THENRETURNEL SE IF D=5THEND=1ELSEIFD=OTHEND=4 


i709: 60701670 
Store room coordinates. 
7780 SePH = IFPS400THENP=400 


1770 CIP)=N: ee edb ds 
Draw solution in 
1780 U=XV=¥s nein at G20: BOSUB1950: GOSUB2050: X=8s D=2:E=2:FORZ= 


1TO100: NEXTZ 


30 


1790 FORL=0TOS:D=S(L): IFE=DTHENPRINT@987, "FORWARD" : ELSEIFD=E+10R 
(D=1ANDE=4) THENPRINT@454, "LEFT": ELSEPRINT@502, "RIGHT": 

1800 E=D:G0SUB1620: IFL< STHENGOSUBISS0ELSEY=1 : GOSUBI850: PRINT340 
kod es Bie 

1810 FORZ=170150:NEXTZ,L: Y=V: X=Us FORZ= 170400: NEXTZ: 6070500 
Display solution on 2D display. 

1820 PRINT#9460, CHRS(30) : sU=X:V=¥: Y=Re1:X=O:E=2 

1830 FORL=O0T0S:D=S(L) AELE4-3: B=Y%3-2:FORZ=11020: SET (A,B) sSET (At 
1,B):RESET(A,B): RESET (A+1,B) :NEXT2Z 

1940 £=):GOSUBI620:NEXTL: Y=: X=U: RETURN 

Draw 3D view of each room down 

hallway. If there is no room to draw 

or a wali crosses the screen, then 

don’t draw any room further down 

the hallway. : 

1850 F=0:G=0:H=0: 1=0:J=0:K=0:M=XeN=V:F=E (A(M,N) ,D):G0SUB1920s IF2 

={ORFCSTHENII10 

1860 G=E(A(M,N),D):GD0SUB1920: IFZ=10RG<STHENI9IO 

1870 H=E(A(M,N) ,D):G0SUB1920: IF 2=1ORH<STHENI910 

1880 I=E(A(M,N) ,D):GQSUB1920: IFZ=10RI<STHENI910 

1890 J=E(A(M,N) ,D):GOSUBI920: IFZ=10RI<STHENI910 

1900 K=E(A(M,N),D) 


1910 G0SUB1950: BOSUB2050: 60SUB2150: G0SUB2250: GOSUB2350: 60102450 
Determine if next possible room is 


beyond maze limits. 
1920 IFD=1THENM=H+iELSEIFD=2THENN=N-1ELSEIFD=STHENM=N-LELSEN=N+1 
1930 TFROCORMCLTHENZ=1ELSEIFNORORN( { THENZ=1ELSEZ=0 | 


194) RETURN 
Display 3D view of room 1. 


1950 CLS: ONF+iG0T01960, 1970, 1980, 1990, 2000, 2010, 2020, 2030, 2040 
1960 RETURN 

1970 605UB2550:60SUB2470: 60102910 

1980 G0SUB2610:G0SUB2670: 605UB2730: 60SUB2790: 60702850 

1990 GO5UB2610:60SUB2670: G0SUB2730: 60702910 

2000 GOSUB2550: 605UB2470: 605UB2790: 60702850 

2010 G0SUB2610:G05UB2730: 605UB2790: 60102850 

2020 GOSUB2610: GOSUB2730: 60SUB2790: 60702910 

2030 GOSUB2550: 605UB2730: GOSUB2790: 60102850 


2040 GOSUB2550: G0SUB2730: gee 60TO2920 
Display 3D view of room 2 


2050 ONG+160702040, 2070, 2080, 2090, 2100, 2110, 2120, 2130, 2140 
2060 RETURN 

2070 G0SUB2560: GOSUB2680:60702920 

2086 GOSUB2620: 60SUB2680: GOSUB2740: GOSUB2800: G0T02860 
2090 G0SUB2620: GOSUB2480s GOSUB2740: 60702920 

2100 G05UB2540: GOSUB2490: 605UB2800: 60702840 

2110 GOSUB2620: 605UB2740: GOSUB2800: 60102860 

2120 GOSUB2620: G0SUB27 40: GOSUB2B00: 60702920 

2130 GOSUB2560: G0SUB2740: G0SUB2800: 60T02B60 


2140 G0SUB2560: G0SUB2740: GOSUB2800: G0T02920 
Display 3D view of room 3. 
2150 ONH+160T02160, 2170, 2180, 2190, 2200, 2210, 2220, 2230, 2240 
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2160 RETURN 

2170 GOSUB2570: GOSUB2690: G0T029730 

2180 GOSUB2430: G0SUB2690: 60SUB2750: GOSUB2810: GOT02870 
2190 GOSUB2630:60SUB2690: G0SUB2750: 60702930 

2200 G0SUB2570:605UB2690: GOSUB281 0: 60702870 

2210 G0SUB24630: G0SUB2750: GOSUB2810: 60702870 

2220 G05UB2630: G0SUB2750: G0SUB2810: 60702930 

2230 GOSUB2570:G0SUB2750; 6OSUB281 0: 60702870 

2240 G05UB2570: GOSUB2750: GOSUB281 0: 60102950 

Display 3D view of room 4. 

2250 ONI+160702260, 2270, 2280, 2290, 2300, 2310, 2320, 2330, 2340 
2260 RETURN 

2270 G0SUB2580: GOSUB2700: 60102940 

2280 GOSUB2640: G0SUB2700: G0SUB2760: G0SUB2820: 6002880 
2290 GOSUB2640:605UB2700: GOSUB2760: 60702940 

2300 GOSUB2590:60SUB2700: G0SUB2820: 60102880 

2310 SOSUB2640: G0SUB2760: G0SUB2820: 60702880 

2320 GOSUB2640: G0SUB2760: GOSUB2820: 60102940 

2330 SOSUB2580: G0SUB2760: GOSUB2820: 60102880 


2340 GOSUB2580: GOSUB2760: GOSUB2820: 60702940 
Display 3D view of room 5. 


2350 ONJ+160T02340, 2370, 2380, 2390, 2400, 2410, 2420, 2430, 2440 
2360 RETURN 

2370 G0SUB2590: 60SUB27 10: 60702950 

9380 GOSUB2650: G0SUB27 1 0: 60SUB2770: BOSUB2830: 60702890 

2390 60SUB2650: GOSUB27 10: 605UB2770: 60102950 

2400 GOSUB2590: G0SUB27 10: G0SUB2830: 60702890 

2410 GOSUB2650: GOSUB2770: GOSUB2830: 60102890 

242) GOSUB2650: BOSUB2770: GOSUB2830: 60702950 

2430 605UB2590: G0SUB2770: GOSUB2830: G0T02890 


2440 G0SUB2590: G0SUB2770: GOSUB2830: 60102950 
Display 3D view of room 6. 


2450 ONK+160702460, 2470, 2480, 2490, 2500, 2510, 2520, 2530, 2540 
2460 RETURN 

2470 §0S5UB2600:605UB2720:G0702960 = : 

9480 GOSUB2660: GOSUB2720: GOSUB2780: GOSUB2840: G0T02900 
2490 GOSUB26460:G60SUB2780: GOSUB2B40: 60702960 

2500 G0SUB2400: 60SUB2780: GOSUB2840: GOT02900 

2910 GN5UB2660: GOSUB2780: G0SUB2840: 60702900 

2520 GOSUB26460: G05UB2720: GOSUB2780: B0T02960 

7530 G0SUB2400: 60SUB2720: G0SUB2840: 60702900 

2540 G0SUB2600: POKE15939, 199: POKE15840, 188: POKE15903, 143: POKEL5? 
04, 143: 60702960 

Draw portions of rooms. 


Draw left hallway horizontal strips. 

2550 PRINTA72, 67%; :PRINTO904, 698; sRETURN 
2560 PRINTA140,68$; sPRINT@844 , GO$; sRETURN 
2570 PRINT@200, 69$5 :PRINT@784, G7$; RETURN 
2580 PRINTO340, 67%; sPRINT@440,69$; :RETURN 
2590 PRINTO409, G8$; :PRINT@400, GBS; s RETURN 
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2600 PRINTO474, G8$s sPRINTOS40, 689: : RETURN 
Draw left hallway diagonal strips. 

2610 PRINTS, G1$s:PRINT@96B, G48: s RETURN 
2620 PRINT@76, 62$; sPRINT@908, G5$; s RETURN 
2630 PRINT@144, 638; :PRINT#848,66$; RETURN 
2640 PRINT@276, 61%; :PRINTA724, G4$5 sRETURN 
2650 PRINTG344,62$: :PRINTOb64 , G5$3 : RETURN 
2660 PRINT@412, 63$; sPRINT@#604, GO$; : RETURN 


Draw wall across screen. | 
2670 PRINT@75, STRINGS (42, 131); :PRINTQ907, STRINGS (42, 176): :RETURN 


2680 PRINT@143, STRINGS (34, 140): :PRINTOB47, STRINGS (34,140): :RETUR 
Ne 

2690 PRINT@211,STRINGS(26, 176); sPRINT@787, STRINGS (26, 131); :RETUR 
N 3 

2700 PRINTAS43, STRINGS (18, 131); sPRINT@G63, STRINGS (18, 176); sRETUR 
N 

2710 PRINTO411, STRINGS (10, 140): sPRINTO603, STRINGS (10, 140) ¢:RETUR 
N : 

2720 POKE15839, 140: POKE15840, 140: POKE15903, 140: POKE15904, 140:RET 
URN : 

Draw left hallway vertical lines. 

2730 PRINT@75, MID$(6$,3, 40); :RETURN 

2740 PRINTA143, CHRS (189) sLEFT$ (6,32) sCHRS (143): RETURN 

2750 PRINT@211, CHRS (175) sLEFTS(6$, 26) sCHRS{(131); sRETURN 

2760 PRINTI343 MIDS (6$,3, 16): RETURN 

2770 PRINT@411, CHRS (188) ;LEFTS (6%, 8) sCHRS (143): sRETURN 

2780 POKE15839, 176: POKE15903, 131: RETURN 

Draw right hallway vertical lines. 

2790 PRINT@116, MIDS (G$, 3,40); sRETURN 

2800 PRINT#176, CHRS$ (188) sLEFTS (6%, 32) sCHRS (143); :RETURN 

2810 PRINT#236, CHRS (176) ;LEFT$ (6%, 26) sCHRS(131);:RETURN 

2820 PRINT#360, MID$(G$,3,16)::RETURN 

2830 PRINT#420, CHRS (188) ;LEFT$ (G$, 8) sCHRS (143) 3 sRETURN 

2840 POKEL5840, 176:POKE15904, 131: RETURN 

Draw right hallway diagonal strips. 

2850 PRINT@S3, 649; :PRINTS1013, 6153 :RETURN 

2860 PRINTO177, 66%; sPRINT@881 , 638s sRETURN 

2870 PRINT@237, G5$; :PRINTIB13, 62%; : RETURN 

2880 PRINT@297, G49: sPRINTS745, 61$s : RETURN 

2890 PRINT#421,66$3:PRINT#4613,63$3 s RETURN 

2900 PRINTS#491, 65%; :PRINT@S45, 62%: s RETURN 

Draw right hallway horizontal strips. 

2910 PRINTAI17,6753 :PRINT@949, 69$s : RETURN | 

2920 PRINTG177, 60%: :PRINTSOG1, GO$ss RETURN 

2930 PRINT@237,69$; :PRINT@813,67$s : RETURN 

2940 PRINTG361, 67%: :PRINTA681, 69%; sRETURN 

2950 PRINTS421 , GOS; sPRINTAS13, 68%; sRETURN 

2960 PRINTS481, G8$; : PRINT@S45, GB$s RETURN 
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Subroutine to determine if a save or load is to use disk or tape. 


lf disk, get maze number. If tape, wait until cassette is ready. 
2970 PRINTBUS;"D"sQU$;" for disk or “;QUS;"C";QUS;" for cassette 
> "33 60SUB220 

2980 IFLE=OTHENRETURNELSEIFA$="D"THENSO20ELSEIFA$="C"THENSO00 
2990 60SUB210: 60702980 

3000 PRINT:PRINT:PRINT"Hit <ENTER) when cassette is ready *: 
3010 ML=0:G0SUB140:A$="C":RETURN 

3020 PRINT:PRINT:PRINT“Enter maze number (1-9999) ";sML=4:G0SUBi 
40 

3030 IFLE=OTHENRETURNELSE IFAC 10RA>9999THENGOSUB2 10: 50703030 
3040 AS="MAZE"+NIDS(STRS(A) ,2)+°/DAT" 


3050 RETURN 
Subroutine to dimension and initialize variables and arrays. 


5000 DINA,AS,A1,B,C,D,E,F,6,6$, 618, 62$, 63%, 64%, 65$, 64%, 67%, 68%, 6 
9$,H,1,d,K,L,LE,M,ML,N,P,Q,QUS,R,5,1,U,V,0,%,1,2,22 

S010 DIMA(30, 16), B44, 10) C1400) ,R¢400) D4, 4), E(14,4),5(400) As 
5), P$(14,2) ,RSU14) 

5020 G$=CHRS (26) +CHRS (24) +CHRE (191) 

5030 FORI=1704:6¢=6$+6$:NEXTI 

5040 GIS=CHR$ (131) CHAS (140) +CHRS (176) 

5050 G2$=CHR$ (140) +CHRS (176) ¢CHRS (26) #CHRS (131) 

5060 S3$=CHR$ (176) CHAS (26) +CHRS (131) +CHRS (140) 

5070 G4$=CHRS (176) +CHR$ (140) #CHRS (131) 

$080 G5$=CHR$ (140) +CHRS (131) +CHRS (27) +CHRS (176) 

5090 G&$=CHR$ (131) +CHRG (27) +CHRS (17) +CHRS (140) 

5100 G7$=STRINGS (3, 131) :GO$=STRINGS (3, 140) :69$=STRINGS (3, 174) 
5110 R$(0)=CHR$ (183) +CHRS (187) :RS(1)=" "+CHR${170):R$(2)=STRINGS 
(2,131) R$(3)=CHRS(149)4" "2R$(4)=STRINGS (2, 176) 

5120 R$(5)=CHRS (147) +CHRS (171) :R$ (6) =CHRS (149) +CHRS (170) :RE(7)=C 
HRS{177)+CHRS (186) :R$(8)=CHRS (151) +CHRS (143) 

5130 R$(9)=STRINGS(2, 179) R$ (10) =CHRG (181) CHAS (178) :R$111) =CHRS 
(1S) #CHRS (171) RS (12) =CHRS (179) +CHRS (187) | 
5140 R$(13)=CHR$ (181) +CHR$ (186) :RS (14) =CHRS (183) +CHRS (179) 

5150 QUS=CHR$ (34) | 

5160 FORZ=0T014sREADPS$(Z, 0) ,P$(Z, 1) ,P$(Z, 2) :NEXTZ 

S170 DATA AN See ite 1 A 1,"  *,"* 
A gs Ae ees eae 6) 17088) ae ieee A a 
ede . 

5180 DhR2 dt, sll alien t,"1 . 1 IH’ = "Hl! 
hel siecle! = INE Y 1,1 
LHW, i. 731 

5190 GUS=CHRS (34) 

5200 FORA=51010:FORB=1704:READB(B, A) :NEXTB,A 

5210 DATA 2, 1,5, 5,356, 1,6, 4,7, 7, 1,853,252) 95459, 2,10, 10,4,3 
5220 FORA=1704:FORB=11T04:READD(B, A) :NEXTB,A 

5230 DATA 9,7,0,5,9,6,5,0,0,10,9,8,10,0,7,4 
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5240 FORA=1104:FORB=07014:READE(B, A) :NEXTB, A 
5250 DATA 0,1,5,85 753514446555 7535 2p 4555057, 
4, 5,3,0,8, 7, 156, 75155545 55 3) 4555 35.2, 0,5,9,7, 
4 


3260 RETURN 


STOMP Sd 


p< @ by) sitlte a3 
are ¢: hy aay, “AUN ane! 


ae 
are 


bin “aus ° TABLE “a 
For TRS-80® MAZE 
STOMP | STOMP 
LINES CODE LENGTH LINES CODE LENGTH 
100 - 210 0S 371 2000 - 2110 SK 280 
tite, = 30 VN 513 2120 - 2230 ES 280 
330 - 520 oc 501 2240 - 2350 FK 304 
530 - 1020 PU 375 2360 - 2470 UH 252 
1030 - 1140 a 374 2490 - 2590 x0 313 
1150 - 1310 GW 266 2400 - 2710 Ta 332 
1380 - 1510 LN 334 | 2720 - 2830 DI 327 
1520 - 1830 AE 143 7940 - 2950 #8 276 
1640 - 1750 EY 280 2960 - 5080 IN 444 
1760 - 1870 OW S19 5090 - 5170 WX 515 
1880 - 1990 ARCS 5180 - 5260 uy 432 


MAZE 
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Issue 45 Adventure: 
Jack The Ripper Ii 


Did the evil Ripper 
ever really die? You 
are an inspector at 
Scotland yard. Can you 
stop the Ripper before 
he strikes again? 


SoftSide Adventure Series =SV =DV 


What would you say to a program that asks, ‘‘What do you want to do?”’ $_ 
Well, you might say, ‘‘GET APPLE”’ or “‘KILL SPIDER’”’, because that’s 
‘how the SoftSide Adventure Series works. q 

Each issue, the latest Adventure takes you to another world of fantasy, 
puzzles and thrills. Your first task — survival — can be daunting until you 4 


figure out the right way to do it. Each adventure sets a fundamental goal 
before you. You might have to rescue a princess, or depose a wicked ruler. 
Along the way, dozens of subsidiary tasks beset you. You’ll have to be in- 
genious and persevering, and your rewards will be great. 

To ‘‘win’’ a fantasy/adventure game, you must solve the author’s devious 
puzzles, and overcome the obstacles that confront you — whether they be 
dragons or desperadoes. Death, should it come, is transitory — just re-run the 
program to live again! 

Express your wishes with one- or two-word commands, like ‘‘LOOK’’, 
‘‘NE”’ (for northeast), or “GET FROQG’’. Use ‘‘I’’ to get an inventory of your 
possessions. The introduction to each Adventure explains this more fully. 

Winning an Adventure is hard enough without the additional requirement 
that you do it all at once. In recognition of this, the Disk Version of the Soft- 
Side Adventure Series now features two new commands: ‘‘SAVE GAMBE”’ and 
‘“*LOAD GAMB’’. 

To start up the Adventure, just run the program called ‘‘INTRO’’, 
‘“INTRO/BAS’’, or ‘SINTRO.BAS”’ on your disk, or select the Adventure 
from the DV menu. On cassette, the INTRO program is the one just before the 
Adventure. 


The Adventure runs in any TRS-80° with at least 16K RAM (32K disk). 


Here are the encrypted hints for Mad House, 
the Adventure in Issue 44. 


Silver dollar: WL MLG KFG RM EVMWRMT NZXSRMV FMGRO TREVM 
GL TVLITV DZHSRMTGLM LI UORKKVW YB OFXPB XSFXPB. 


Top hat: WL MLG TREV GL NZTRXRZM FMGRO GIRXPB WRXPB $ 


SZH YVVM WVZOG DRGS. 

Tricky Dicky: WIVHH FK ORPV ZYV ORMXLOM. 
Shakespeare: TREV SRN Z ULFI-OVZU XOLEVI. 
Bunny: ORPVH XOLEVI. 

To get into the garden: HLFMW XZM YIVZP TOZHH. 
To pass a day; HOVVK LM BLFI YFMP. 


To escape: 

A. VMGVI OZFMWIB ILLN LM KRXP FK WZB. 

B. SZEV Z ORG UOZHSORTSG. 

C. SRWV RM OZFMWIB YZT. 

D. OLLP OZFMWIB; GSVM TVG ZMW DVZI GSV FMRULIN. 
E. OVZEV YZT ZUGVI GIFXP HGLKH. 

F. VCRG WLLI. 
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General Information: 


These are the standard procedures for the programs published by 
SoftSide Publications, Inc. Sometimes, a particular program does not 
lend itself to these procedures. Always read the specific instructions 
accompanying a program. They will instruct you if there are any 
variances from the following procedures. Also, back issues of Soft: 
Side Magazine may differ in some details. 


STOMP. swttliy 
<< 


Wie, 
RL et rei wae, AaKrr® and WWThy, * 
_ 4 ‘Bye eo = 
Gis” am" TABLE “an Sard 


) At the conclusion of each SoftSide listing, we include a STOMP 
Table. STOMP for the TRS-80 appeared in Issue #45. STOMP 
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supersedes SWAT as SoftSide’s standard debugging tool to help 
those who type BASIC programs from the pages of SoftSide Selec- 
tions. If you don’t have STOMP, we’ll send you a free reprint. Send a 
business-sized, self-addressed, stamped envelope to: 


SoftSide Publications, Inc. 
Department STOMP 

10 Northern Blvd. 
Northwood Executive Park 
Amherst, NH 03031 


Be sure to tell us that you have a TRS-80 computer. 


Magnetic Media 

Disks are available in Model | or Model III format. They contain the 
DOSPLUS operating system. A cover program runs automatically 
when you boot the disk. To avoid entering BASIC and running the 
cover program, press and hold the Enter key as the disk boots. 

Back issues prior to May, 1981, are available in Model | format only. 
If you have a two-drive Model III, you can convert such disks with the 
Convert utility. | 

Tapes CLOAD in the normal manner on Model I’s, and at low speed 
(500 baud) on Model IIl’s. The first program is a cover program; side 
two of the tape duplicates side one. 

SoftSide Selections disks and tapes are duplicated on reliable, pro- 
fessional equipment. Bad copies are exceedingly rare. Nevertheless, 
the trip through the mail occasionally results in damage to the sen- 
sitive magnetic media. If, after a reasonable number of tries on clean, 
well-adjusted equipment, you are unable to load a program, return it to 
us with a precise explanation of the problem. We shall send you a 
replacement copy. 

SoftSide Selections media are not copy-protected. We urge you to 
make an archival backup copy of your disk or tape as soon as you 
receive it, as our replacement policy is valid only for 30 days. Please 
resist the urge to give away copies of copyrighted material. 


Line Listings 

The line listings in this booklet are in standard 64-column format, 
and they appear exactly as they should on your screen when you type 
LIST. Because STOMP ignores spaces between keywords, you may 
add them to enhance the legibility of the program you are typing. You 
should note, however, that each additional space occupies one more 
byte of valuable memory. If you are not sure about the availability of 
memory, add no additional spaces. : 
@ Lower-case characters: Some TRS-80s have lower case. Many pro- 
grams we publish contain lower case. Since STOMP, SoftSide’s 
debugging utility, ignores the case of characters, you may use capital 
letters if you so desire or if your computer doesn’t have lower case. 


Copyright © 1983 SoftSide Publications, Inc. 


These programs are for your personal use only. Please resist the 
urge to give away copies of copyrighted material. 
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@ Use And Enjoy These Programs Right 
Away! 


@e Avoid Worry About Typos! 


@ Get Additional Programs to Enjoy 
Without Typing. 


Order this Issue’s Programs on Disk or Cassette! 


Send the coupon below to: 
SoftSide Publications, Inc.» 
10 Northern Blvd. 
Northwood Executive Park 
Amherst, NH 03031 


=V =DV 
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ORDER THIS ISSUE’S MEDIA | Selections 


Having difficulty finding the time to input the programs 
from this issue of SoftSide Selections? Don’t despair — the 
cassette and disk versions are still available! And, each DV 
(disk version) contains an additional program. 

C0 #45 DV $16.00 FC #45 CV $8.00 


TC TRS-80® Mod. | 0) TRS-80® Mod. II! 


Name 

Address 

City/States 2a. 3 ee een Zip 
L] Check or Money Order 

CL] MasterCard (J VISA 

Name-or Cardholder <2 2 ec ee 
MGRPPR SAH 2S ote 8 SS ee ee a ees A product of Sollsive Publicallone: in 
Exp. Date____/___/___ Signature ms ee 


seas Di bject to change without notice. TRS-80® is a registered trademark of Tandy Corporation respectively. 


offSide_ 
~— Selecti ions 


Here’s SoftSide Selections, the handy, pull-out 
booklet with program listings for your TRS-80 
Model | or IIl computer. This issue, SoftSide 
Selections for the TRS-80 features: 


@® Sea Base puts you in charge of an undersea ci- 
ty with a waning geothermal energy source. 


@ Maze — This program puts you inside a three- 
dimensional i 


@ TRS-80 DV Bonus Program: Filter 

Use this power print formatting program, in 
conjunction with your word processor, to control 
your printer and format your text, according to 
your specifications. 


® The SoftSide Adventure Series — 
Jack The Ripper Il, by Peter Kirsch 

Your grandfather chased the evil Ripper to a 
watery death in the River Thames, or so he thougNt. 
Now it seems that the Ripper lives again... — 


SOFTSIDE PUBLICATIONS, INC. 


Amherst, New Hampshire 


